home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FM Towns: Free Software Collection 9
/
FM Towns Free Software Collection 9.iso
/
t_os
/
tool
/
mopterm
/
sample.plt
< prev
Wrap
Text File
|
1994-11-16
|
2KB
|
43 lines
/***********************************************************************
* auto pilot sample program by mop(pff00570)
*
* Nifty Serveに接続する処理です。
*
* このサンプルについては,著作権を破棄します。自由に,流用,変更,配付
* してかまいません。
***********************************************************************/
/***********************************************************************
*
* FENICS経由の接続でビジーが返る時に, .00+を繰り返し入力する処理
*
***********************************************************************/
%type00 {
type({.00+});
wait({20}, type00, /* 20秒待って,なにもこないなら,00+ */
{46+}, type00, /* 46+ なら 00+ */
{+\n00+},type00, /* 00+ なら 00+ */
{Enter Connection-ID --->}, /* Enter C.. なら 終わり */
);
};
/***********************************************************************
*
* メイン処理(回線の設定を行い,電話を掛け,各処理を呼び出す)
*
***********************************************************************/
baud({1200}); /* タウンズの回線のボーレートを1200にする */
xon({Yes}); /* X-制御による,フロー制御を 行う */
dial({ATDP 0559235038}); /* ダイヤル回線で, 0559235038に電話を掛ける。
お近くの,アクセスポイントに変更して下さい
また,プッシュ回線の場合は,ATDT xxxxに変更
して下さい */
type00; /* FENICSに対して,Niftyへの接続を依頼する */
type({SVC\n});
wait({20},{stop},{Enter User-ID --->},);
type({AAA00000\n}); /* AAA00000は貴方のユーザIDに変更して下さい */
wait({20},{stop},{Enter Password --->},);
type({PASSWORD\n}) /* PASSWORDは貴方のパスワードに変更して下さい */